home *** CD-ROM | disk | FTP | other *** search
/ Aminet 45 / Aminet 45 (2001)(GTI - Schatztruhe)[!][Oct 2001].iso / Aminet / game / misc / IChing.lha / IChing / IChingPages.c < prev    next >
C/C++ Source or Header  |  2001-07-11  |  14KB  |  360 lines

  1. /******************************************************
  2. **    ICHINGPAGES.C     Page definitions for the
  3. **                      I Ching program.
  4. **
  5. **    LAST CHANGED:     9/9/88
  6. **
  7. *******************************************************/
  8.  
  9. #include "IChing.h"
  10. #include "IChingStructs.h"
  11. #include "IChingImages.c"
  12.  
  13. static struct  IntuiText   T_Attr = { 1, 0, JAM1, 100, 13, NULL,
  14.  
  15.       " NAME   ATTRIBUTE   ANIMAL  BODY  FAMILY     OBJECT", NULL };
  16.  
  17. struct   IntuiText   *Attr = &T_Attr;
  18.  
  19. /* ------------------------ Trigram Text: ---------------------------- */
  20.  
  21. static struct  IntuiText   T_Chientxt = { 1, 0, JAM1, 0, 0, NULL,
  22.  
  23.       " Ch'ien  strength    horse   head  Father    Heaven", NULL };
  24.  
  25. static struct  IntuiText   T_Kuntxt = { 1, 0, JAM1, 0, 0, NULL,
  26.  
  27.       " K'un    docility     ox    belly Mother     Earth", NULL };
  28.  
  29. static struct  IntuiText   NxtChentxt = { 1, 0, JAM1, 0, 10, NULL,
  30.  
  31.       "                                   Son", NULL };
  32.  
  33. static struct  IntuiText   T_Chentxt = { 1, 0, JAM1, 0, 0, NULL,
  34.  
  35.       " Chen   movement    dragon  foot  eldest     thunder", &NxtChentxt };
  36.  
  37. static struct  IntuiText   NxtSuntxt = { 1, 0, JAM1, 0, 10, NULL,
  38.  
  39.       "                                  Daughter   & wind", NULL };
  40.  
  41. static struct  IntuiText   T_Suntxt = { 1, 0, JAM1, 0, 0, NULL,
  42.  
  43.       " Sun   penetration  fowl   thigh  eldest     wood", &NxtSuntxt };
  44.  
  45. static struct  IntuiText   NxtKantxt = { 1, 0, JAM1, 0, 10, NULL,
  46.  
  47.       "                                   Son       & moon", NULL };
  48.  
  49. static struct  IntuiText   T_Kantxt = { 1, 0, JAM1, 0, 0, NULL,
  50.  
  51.       " K'an     danger     pig    ear   second     water", &NxtKantxt };
  52.  
  53. static struct  IntuiText   NxtLitxt = { 1, 0, JAM1, 0, 10, NULL,
  54.  
  55.       "                                  Daughter   & sun", NULL };
  56.  
  57. static struct  IntuiText   T_Litxt = { 1, 0, JAM1, 0, 0, NULL,
  58.  
  59.       "  Li   brightness    hen    eye   second     fire", &NxtLitxt };
  60.  
  61. static struct  IntuiText   NxtKentxt = { 1, 0, JAM1, 0, 10, NULL,
  62.  
  63.       "                                   Son", NULL };
  64.  
  65. static struct  IntuiText   T_Kentxt = { 1, 0, JAM1, 0, 0, NULL,
  66.  
  67.       " Ken   stand-still   dog    hand  youngest   mountain", &NxtKentxt };
  68.  
  69. static struct  IntuiText   NxtTuitxt = { 1, 0, JAM1, 0, 10, NULL,
  70.  
  71.       "                                  Daughter", NULL };
  72.  
  73. static struct  IntuiText   T_Tuitxt = { 1, 0, JAM1, 0, 0, NULL,
  74.  
  75.       " Tui    pleasure    sheep  mouth  youngest   marsh", &NxtTuitxt };
  76.  
  77. /* ------------------------- The Trigram structures: -------------------- */
  78.  
  79. static struct  TRIGRAM Trigrams[] = {
  80.    { { &T_Kuntxt },   { &Tri1 } },
  81.    { { &T_Chentxt },  { &Tri2 } },
  82.    { { &T_Kantxt },   { &Tri4 } },
  83.    { { &T_Tuitxt },   { &Tri7 } },
  84.    { { &T_Kentxt },   { &Tri6 } },
  85.    { { &T_Litxt },    { &Tri5 } },
  86.    { { &T_Suntxt },   { &Tri3 } },
  87.    { { &T_Chientxt }, { &Tri0 } }
  88.    };
  89.  
  90. /* ---------------------- Hexname structures: ------------------------ */
  91.  
  92. static struct IntuiText    Name[] = {
  93.  
  94.     { 1, 0, JAM1, 0, 0, NULL, " 2: Khwan",    NULL },      /* page 1 */
  95.     { 1, 0, JAM1, 0, 0, NULL, "24: Fu",       NULL },      /* page 2 */
  96.     { 1, 0, JAM1, 0, 0, NULL, " 7: Sze",      NULL },      /* page 3 */
  97.     { 1, 0, JAM1, 0, 0, NULL, "19: Lin",      NULL },      /* page 4 */
  98.     { 1, 0, JAM1, 0, 0, NULL, "15: Khien",    NULL },      /* page 5 */
  99.     { 1, 0, JAM1, 0, 0, NULL, "36: Ming I",   NULL },      /* page 6 */
  100.     { 1, 0, JAM1, 0, 0, NULL, "46: Shang",    NULL },      /* page 7 */
  101.     { 1, 0, JAM1, 0, 0, NULL, "11: Thai",     NULL },      /* page 8 */
  102.     { 1, 0, JAM1, 0, 0, NULL, "16: Yu",       NULL },      /* page 9 */
  103.     { 1, 0, JAM1, 0, 0, NULL, "51: Kan",      NULL },      /* page 10 */
  104.     { 1, 0, JAM1, 0, 0, NULL, "40: Kieh",     NULL },      /* page 11 */
  105.     { 1, 0, JAM1, 0, 0, NULL, "54: Kwei Mei", NULL },      /* page 12 */
  106.     { 1, 0, JAM1, 0, 0, NULL, "62: Hsiao Kwo",NULL },      /* page 13 */
  107.     { 1, 0, JAM1, 0, 0, NULL, "55: Fang",     NULL },      /* page 14 */
  108.     { 1, 0, JAM1, 0, 0, NULL, "32: Hang",     NULL },      /* page 15 */
  109.     { 1, 0, JAM1, 0, 0, NULL, "34: Ta Kwang", NULL },      /* page 16 */
  110.     { 1, 0, JAM1, 0, 0, NULL, " 8: Pi",       NULL },      /* page 17 */
  111.     { 1, 0, JAM1, 0, 0, NULL, " 3: Kun",      NULL },      /* page 18 */
  112.     { 1, 0, JAM1, 0, 0, NULL, "29: Khan",     NULL },      /* page 19 */
  113.     { 1, 0, JAM1, 0, 0, NULL, "60: Kieh",     NULL },      /* page 20 */
  114.     { 1, 0, JAM1, 0, 0, NULL, "39: Kien",     NULL },      /* page 21 */
  115.     { 1, 0, JAM1, 0, 0, NULL, "63: Ki Chi",   NULL },      /* page 22 */
  116.     { 1, 0, JAM1, 0, 0, NULL, "48: Ching",    NULL },      /* page 23 */
  117.     { 1, 0, JAM1, 0, 0, NULL, " 5: Hsu",      NULL },      /* page 24 */
  118.     { 1, 0, JAM1, 0, 0, NULL, "45: Chhui",    NULL },      /* page 25 */
  119.     { 1, 0, JAM1, 0, 0, NULL, "17: Sui",      NULL },      /* page 26 */
  120.     { 1, 0, JAM1, 0, 0, NULL, "47: Khwan",    NULL },      /* page 27 */
  121.     { 1, 0, JAM1, 0, 0, NULL, "58: Tui",      NULL },      /* page 28 */
  122.     { 1, 0, JAM1, 0, 0, NULL, "31: Hsien",    NULL },      /* page 29 */
  123.     { 1, 0, JAM1, 0, 0, NULL, "49: Ko",       NULL },      /* page 30 */
  124.     { 1, 0, JAM1, 0, 0, NULL, "28: Ta Kwo",   NULL },      /* page 31 */
  125.     { 1, 0, JAM1, 0, 0, NULL, "43: Kwai",     NULL },      /* page 32 */
  126.     { 1, 0, JAM1, 0, 0, NULL, "23: Po",       NULL },      /* page 33 */
  127.     { 1, 0, JAM1, 0, 0, NULL, "27: I",        NULL },      /* page 34 */
  128.     { 1, 0, JAM1, 0, 0, NULL, " 4: Mang",     NULL },      /* page 35 */
  129.     { 1, 0, JAM1, 0, 0, NULL, "41: Sun",      NULL },      /* page 36 */
  130.     { 1, 0, JAM1, 0, 0, NULL, "52: Kan",      NULL },      /* page 37 */
  131.     { 1, 0, JAM1, 0, 0, NULL, "22: Pi",       NULL },      /* page 38 */
  132.     { 1, 0, JAM1, 0, 0, NULL, "18: Ku",       NULL },      /* page 39 */
  133.     { 1, 0, JAM1, 0, 0, NULL, "26: Ta Khu",   NULL },      /* page 40 */
  134.     { 1, 0, JAM1, 0, 0, NULL, "35: Chin",     NULL },      /* page 41 */
  135.     { 1, 0, JAM1, 0, 0, NULL, "21: Shih Ho",  NULL },      /* page 42 */
  136.     { 1, 0, JAM1, 0, 0, NULL, "64: Wei Chi",  NULL },      /* page 43 */
  137.     { 1, 0, JAM1, 0, 0, NULL, "38: Khwei",    NULL },      /* page 44 */
  138.     { 1, 0, JAM1, 0, 0, NULL, "56: Lu",       NULL },      /* page 45 */
  139.     { 1, 0, JAM1, 0, 0, NULL, "30: Li",       NULL },      /* page 46 */
  140.     { 1, 0, JAM1, 0, 0, NULL, "50: Ting",     NULL },      /* page 47 */
  141.     { 1, 0, JAM1, 0, 0, NULL, "14: Ta Yu",    NULL },      /* page 48 */
  142.     { 1, 0, JAM1, 0, 0, NULL, "20: Kwan",     NULL },      /* page 49 */
  143.     { 1, 0, JAM1, 0, 0, NULL, "42: Yi",       NULL },      /* page 50 */
  144.     { 1, 0, JAM1, 0, 0, NULL, "59: Hwan",     NULL },      /* page 51 */
  145.     { 1, 0, JAM1, 0, 0, NULL, "61: Kung Fu",  NULL },      /* page 52 */
  146.     { 1, 0, JAM1, 0, 0, NULL, "53: Kien",     NULL },      /* page 53 */
  147.     { 1, 0, JAM1, 0, 0, NULL, "37: Kia Zan",  NULL },      /* page 54 */
  148.     { 1, 0, JAM1, 0, 0, NULL, "57: Sun",      NULL },      /* page 55 */
  149.     { 1, 0, JAM1, 0, 0, NULL, " 9: Hsiao Khu",NULL },      /* page 56 */
  150.     { 1, 0, JAM1, 0, 0, NULL, "12: Phi",      NULL },      /* page 57 */
  151.     { 1, 0, JAM1, 0, 0, NULL, "25: Wu Wang",  NULL },      /* page 58 */
  152.     { 1, 0, JAM1, 0, 0, NULL, " 6: Sung",     NULL },      /* page 59 */
  153.     { 1, 0, JAM1, 0, 0, NULL, "10: Li",       NULL },      /* page 60 */
  154.     { 1, 0, JAM1, 0, 0, NULL, "33: Thun",     NULL },      /* page 61 */
  155.     { 1, 0, JAM1, 0, 0, NULL, "13: Thung Zan",NULL },      /* page 62 */
  156.     { 1, 0, JAM1, 0, 0, NULL, "44: Kau",      NULL },      /* page 63 */
  157.     { 1, 0, JAM1, 0, 0, NULL, " 1: Khien",    NULL }       /* page 64 */
  158.    };
  159. /* ------------------- The pages of structures: ---------------------- */
  160.  
  161. static struct   PAGE  page[] = {
  162.  
  163.    { { &Name[0] }, { &Trigrams[ T_KUN ] },    /* page 1 */
  164.      { &Trigrams[ T_KUN ] }
  165.    },
  166.    { { &Name[1] }, { &Trigrams[ T_KUN ] },    /* page 2 */
  167.      { &Trigrams[ T_CHEN ] }
  168.    },
  169.    { { &Name[2] }, { &Trigrams[ T_KUN ] },    /* page 3 */
  170.      { &Trigrams[ T_KAN ] }
  171.    },
  172.    { { &Name[3] }, { &Trigrams[ T_KUN ] },    /* page 4 */
  173.      { &Trigrams[ T_TUI ] }
  174.    },
  175.    { { &Name[4] }, { &Trigrams[ T_KUN ] },    /* page 5 */
  176.      { &Trigrams[ T_KEN ] }
  177.    },
  178.    { { &Name[5] }, { &Trigrams[ T_KUN ] },    /* page 6 */
  179.      { &Trigrams[ T_LI ] }
  180.    },
  181.    { { &Name[6] }, { &Trigrams[ T_KUN ] },    /* page 7 */
  182.      { &Trigrams[ T_SUN ] }
  183.    },
  184.    { { &Name[7] }, { &Trigrams[ T_KUN ] },    /* page 8 */
  185.      { &Trigrams[ T_CHIEN ] }
  186.    },
  187.    { { &Name[8] }, { &Trigrams[ T_CHEN ] },   /* page 9 */
  188.      { &Trigrams[ T_KUN ] }
  189.    },
  190.    { { &Name[9] }, { &Trigrams[ T_CHEN ] },   /* page 10 */
  191.      { &Trigrams[ T_CHEN ] }
  192.    },
  193.    { { &Name[10] }, { &Trigrams[ T_CHEN ] },  /* page 11 */
  194.      { &Trigrams[ T_KAN ] }
  195.    },
  196.    { { &Name[11] }, { &Trigrams[ T_CHEN ] },  /* page 12 */
  197.      { &Trigrams[ T_TUI ] }
  198.    },
  199.    { { &Name[12] }, { &Trigrams[ T_CHEN ] },  /* page 13 */
  200.      { &Trigrams[ T_KEN ] }
  201.    },
  202.    { { &Name[13] }, { &Trigrams[ T_CHEN ] },  /* page 14 */
  203.      { &Trigrams[ T_LI ] }
  204.    },
  205.    { { &Name[14] }, { &Trigrams[ T_CHEN ] },  /* page 15 */
  206.      { &Trigrams[ T_SUN ] }
  207.    },
  208.    { { &Name[15] }, { &Trigrams[ T_CHEN ] },  /* page 16 */
  209.      { &Trigrams[ T_CHIEN ] }
  210.    },
  211.    { { &Name[16] }, { &Trigrams[ T_KAN ] },   /* page 17 */
  212.      { &Trigrams[ T_KUN ] }
  213.    },
  214.    { { &Name[17] }, { &Trigrams[ T_KAN ] },   /* page 18 */
  215.      { &Trigrams[ T_CHEN ] }
  216.    },
  217.    { { &Name[18] }, { &Trigrams[ T_KAN ] },   /* page 19 */
  218.      { &Trigrams[ T_KAN ] }
  219.    },
  220.    { { &Name[19] }, { &Trigrams[ T_KAN ] },   /* page 20 */
  221.      { &Trigrams[ T_TUI ] }
  222.    },
  223.    { { &Name[20] }, { &Trigrams[ T_KAN ] },   /* page 21 */
  224.      { &Trigrams[ T_KEN ] }
  225.    },
  226.    { { &Name[21] }, { &Trigrams[ T_KAN ] },   /* page 22 */
  227.      { &Trigrams[ T_LI ] }
  228.    },
  229.    { { &Name[22] }, { &Trigrams[ T_KAN ] },   /* page 23 */
  230.      { &Trigrams[ T_SUN ] }
  231.    },
  232.    { { &Name[23] }, { &Trigrams[ T_KAN ] },   /* page 24 */
  233.      { &Trigrams[ T_CHIEN ] }
  234.    },
  235.    { { &Name[24] }, { &Trigrams[ T_TUI ] },   /* page 25 */
  236.      { &Trigrams[ T_KUN ] }
  237.    },
  238.    { { &Name[25] }, { &Trigrams[ T_TUI ] },   /* page 26 */
  239.      { &Trigrams[ T_CHEN ] }
  240.    },
  241.    { { &Name[26] }, { &Trigrams[ T_TUI ] },   /* page 27 */
  242.      { &Trigrams[ T_KAN ] }
  243.    },
  244.    { { &Name[27] }, { &Trigrams[ T_TUI ] },   /* page 28 */
  245.      { &Trigrams[ T_TUI ] }
  246.    },
  247.    { { &Name[28] }, { &Trigrams[ T_TUI ] },   /* page 29 */
  248.      { &Trigrams[ T_KEN ] }
  249.    },
  250.    { { &Name[29] }, { &Trigrams[ T_TUI ] },   /* page 30 */
  251.      { &Trigrams[ T_LI ] }
  252.    },
  253.    { { &Name[30] }, { &Trigrams[ T_TUI ] },   /* page 31 */
  254.      { &Trigrams[ T_SUN ] }
  255.    },
  256.    { { &Name[31] }, { &Trigrams[ T_TUI ] },   /* page 32 */
  257.      { &Trigrams[ T_CHIEN ] }
  258.    },
  259.    { { &Name[32] }, { &Trigrams[ T_KEN ] },   /* page 33 */
  260.      { &Trigrams[ T_KUN ] }
  261.    },
  262.    { { &Name[33] }, { &Trigrams[ T_KEN ] },   /* page 34 */
  263.      { &Trigrams[ T_CHEN ] }
  264.    },
  265.    { { &Name[34] }, { &Trigrams[ T_KEN ] },   /* page 35 */
  266.      { &Trigrams[ T_KAN ] }
  267.    },
  268.    { { &Name[35] }, { &Trigrams[ T_KEN ] },   /* page 36 */
  269.      { &Trigrams[ T_TUI ] }
  270.    },
  271.    { { &Name[36] }, { &Trigrams[ T_KEN ] },   /* page 37 */
  272.      { &Trigrams[ T_KEN ] }
  273.    },
  274.    { { &Name[37] }, { &Trigrams[ T_KEN ] },   /* page 38 */
  275.      { &Trigrams[ T_LI ] }
  276.    },
  277.    { { &Name[38] }, { &Trigrams[ T_KEN ] },   /* page 39 */
  278.      { &Trigrams[ T_SUN ] }
  279.    },
  280.    { { &Name[39] }, { &Trigrams[ T_KEN ] },   /* page 40 */
  281.      { &Trigrams[ T_CHIEN ] }
  282.    },
  283.    { { &Name[40] }, { &Trigrams[ T_LI ] },    /* page 41 */
  284.      { &Trigrams[ T_KUN ] }
  285.    },
  286.    { { &Name[41] }, { &Trigrams[ T_LI ] },    /* page 42 */
  287.      { &Trigrams[ T_CHEN ] }
  288.    },
  289.    { { &Name[42] }, { &Trigrams[ T_LI ] },    /* page 43 */
  290.      { &Trigrams[ T_KAN ] }
  291.    },
  292.    { { &Name[43] }, { &Trigrams[ T_LI ] },    /* page 44 */
  293.      { &Trigrams[ T_TUI ] }
  294.    },
  295.    { { &Name[44] }, { &Trigrams[ T_LI ] },    /* page 45 */
  296.      { &Trigrams[ T_KEN ] }
  297.    },
  298.    { { &Name[45] }, { &Trigrams[ T_LI ] },    /* page 46 */
  299.      { &Trigrams[ T_LI ] }
  300.    },
  301.    { { &Name[46] }, { &Trigrams[ T_LI ] },    /* page 47 */
  302.      { &Trigrams[ T_SUN ] }
  303.    },
  304.    { { &Name[47] }, { &Trigrams[ T_LI ] },    /* page 48 */
  305.      { &Trigrams[ T_CHIEN ] }
  306.    },
  307.    { { &Name[48] }, { &Trigrams[ T_SUN ] },   /* page 49 */
  308.      { &Trigrams[ T_KUN ] }
  309.    },
  310.    { { &Name[49] }, { &Trigrams[ T_SUN ] },   /* page 50 */
  311.      { &Trigrams[ T_CHEN ] }
  312.    },
  313.    { { &Name[50] }, { &Trigrams[ T_SUN ] },   /* page 51 */
  314.      { &Trigrams[ T_KAN ] }
  315.    },
  316.    { { &Name[51] }, { &Trigrams[ T_SUN ] },   /* page 52 */
  317.      { &Trigrams[ T_TUI ] }
  318.    },
  319.    { { &Name[52] }, { &Trigrams[ T_SUN ] },   /* page 53 */
  320.      { &Trigrams[ T_KEN ] }
  321.    },
  322.    { { &Name[53] }, { &Trigrams[ T_SUN ] },   /* page 54 */
  323.      { &Trigrams[ T_LI ] }
  324.    },
  325.    { { &Name[54] }, { &Trigrams[ T_SUN ] },   /* page 55 */
  326.      { &Trigrams[ T_SUN ] }
  327.    },
  328.    { { &Name[55] }, { &Trigrams[ T_SUN ] },   /* page 56 */
  329.      { &Trigrams[ T_CHIEN ] }
  330.    },
  331.    { { &Name[56] }, { &Trigrams[ T_CHIEN ] }, /* page 57 */
  332.      { &Trigrams[ T_KUN ] }
  333.    },
  334.    { { &Name[57] }, { &Trigrams[ T_CHIEN ] }, /* page 58 */
  335.      { &Trigrams[ T_CHEN ] }
  336.    },
  337.    { { &Name[58] }, { &Trigrams[ T_CHIEN ] }, /* page 59 */
  338.      { &Trigrams[ T_KAN ] }
  339.    },
  340.    { { &Name[59] }, { &Trigrams[ T_CHIEN ] }, /* page 60 */
  341.      { &Trigrams[ T_TUI ] }
  342.    },
  343.    { { &Name[60] }, { &Trigrams[ T_CHIEN ] }, /* page 61 */
  344.      { &Trigrams[ T_KEN ] }
  345.    },
  346.    { { &Name[61] }, { &Trigrams[ T_CHIEN ] }, /* page 62 */
  347.      { &Trigrams[ T_LI ] }
  348.    },
  349.    { { &Name[62] }, { &Trigrams[ T_CHIEN ] }, /* page 63 */
  350.      { &Trigrams[ T_SUN ] }
  351.    },
  352.    { { &Name[63] }, { &Trigrams[ T_CHIEN ] }, /* page 64 */
  353.      { &Trigrams[ T_CHIEN ] }
  354.    }
  355.   };
  356.  
  357. struct   PAGE  *FirstPage = &page[0];
  358.  
  359. /* ----------------------- End of IChingPages.c ----------------------- */
  360.